home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 November / Chip_2004-11_cd1.bin / software / frigate / Frigate3_Lite_v25.exe / {app} / Addons / Schemes / VBScript.sch < prev    next >
Text File  |  2004-01-06  |  3KB  |  115 lines

  1. object TPersHolder
  2.   P.Name = 'VBScript'
  3.   P.Extensions.Strings = (
  4.     'asa'
  5.     'vb')
  6.   P.SyntaxBlocks = <
  7.     item
  8.       Name = 'Default'
  9.       ID = 0
  10.       FIText = 0
  11.       FIIntNum = 1
  12.       FIFloatNum = 2
  13.       FIHexNum = 3
  14.       UseComments = True
  15.       UseSingleLineComments = True
  16.       UseStrings = True
  17.       UseSingleLineStrings = True
  18.       UseNumbers = True
  19.       UseKeywords = True
  20.       BlockDelimiters = <>
  21.       SingleLineCommentDelimiters = <
  22.         item
  23.           FontID = 4
  24.           LeftDelimiter = #39
  25.         end
  26.         item
  27.           FontID = 5
  28.           LeftDelimiter = 'rem'
  29.         end>
  30.       SingleLineStringDelimiters = <
  31.         item
  32.           FontID = 6
  33.           LeftDelimiter = '"'
  34.           RightDelimiter = '"'
  35.         end>
  36.       KeywordSets = <
  37.         item
  38.           FontID = 7
  39.           Name = 'reserved'
  40.           Keywords = 
  41.             'And,As,Attribute,Base,ByVal,Call,Case,Compare,Const,Date,Declare' +
  42.             ',Dim,Do,Each,Else,Elseif,Empty,end,Error,Exit,Explicit,False,For' +
  43.             ',friend,Function,get,If,Is,let,Loop,Mod,Next,Not,Nothing,Null,On' +
  44.             ',Option,Or,Private,property,Public,ReDim,Rem,Select,Set,String,S' +
  45.             'ub,Then,To,True,Type,Wend,While,With,Xor'
  46.         end>
  47.     end>
  48.   P.FontTable = <
  49.     item
  50.       FontID = 0
  51.       Font.Charset = DEFAULT_CHARSET
  52.       Font.Color = clBlack
  53.       Font.Height = -13
  54.       Font.Name = 'Courier New'
  55.       Font.Style = []
  56.     end
  57.     item
  58.       FontID = 1
  59.       Font.Charset = DEFAULT_CHARSET
  60.       Font.Color = clGreen
  61.       Font.Height = -13
  62.       Font.Name = 'Courier New'
  63.       Font.Style = []
  64.     end
  65.     item
  66.       FontID = 2
  67.       Font.Charset = DEFAULT_CHARSET
  68.       Font.Color = clGreen
  69.       Font.Height = -13
  70.       Font.Name = 'Courier New'
  71.       Font.Style = []
  72.     end
  73.     item
  74.       FontID = 3
  75.       Font.Charset = DEFAULT_CHARSET
  76.       Font.Color = clGreen
  77.       Font.Height = -13
  78.       Font.Name = 'Courier New'
  79.       Font.Style = []
  80.     end
  81.     item
  82.       FontID = 4
  83.       Font.Charset = DEFAULT_CHARSET
  84.       Font.Color = clGray
  85.       Font.Height = -13
  86.       Font.Name = 'Courier New'
  87.       Font.Style = [fsItalic]
  88.     end
  89.     item
  90.       FontID = 5
  91.       Font.Charset = DEFAULT_CHARSET
  92.       Font.Color = clGray
  93.       Font.Height = -13
  94.       Font.Name = 'Courier New'
  95.       Font.Style = [fsItalic]
  96.     end
  97.     item
  98.       FontID = 6
  99.       Font.Charset = DEFAULT_CHARSET
  100.       Font.Color = clGreen
  101.       Font.Height = -13
  102.       Font.Name = 'Courier New'
  103.       Font.Style = []
  104.     end
  105.     item
  106.       FontID = 7
  107.       Font.Charset = DEFAULT_CHARSET
  108.       Font.Color = clBlack
  109.       Font.Height = -13
  110.       Font.Name = 'Courier New'
  111.       Font.Style = [fsBold]
  112.     end>
  113.   P.SyntaxVersion = 2
  114. end
  115.